home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / giochi / hf1.lha / GameOver.Amos / GameOver.amosSourceCode
AMOS Source Code  |  1993-03-08  |  264b  |  18 lines
  1. Load "Hf1:GameOver.Abk",20
  2. Unpack 20 To 0
  3. Hide 
  4. Erase 20
  5. Load "HF1:GameOverSnd.Abk",5
  6. Sam Bank 5
  7. Sam Play 1
  8. S=0
  9. While 1=1
  10.    Clear Key 
  11.    A$=Inkey$
  12.    If Mouse Key Then Exit 
  13.    If Fire(1) Then Exit 
  14.    If Inkey$<>"" Then Exit 
  15. Wend 
  16. Screen Close 0
  17. Sam Stop 
  18. View